home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / E / Exegesis Tools.cpt / Exegesis Tools / background_4313.txt < prev    next >
Text File  |  1990-12-13  |  4KB  |  199 lines
  1. -- background: 4313 from stack: in
  2. -- bmap block id: 9922
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: Notes Back
  6. ----- HyperTalk script -----
  7. on opencard
  8.   --this script comes from Stack Developer by Steve Drazga
  9.   put (the number of this card - the number of first card of this background+1) into field "Page Num"
  10.   click at 150,126
  11. end opencard
  12.  
  13.  
  14.  
  15. -- part 5 (field)
  16. -- low flags: 00
  17. -- high flags: 4000
  18. -- rect: left=147 top=117 right=278 bottom=473
  19. -- title width / last selected line: 0
  20. -- icon id / first selected line: 0 / 0
  21. -- text alignment: 0
  22. -- font id: 128
  23. -- text size: 10
  24. -- style flags: 0
  25. -- line height: 13
  26. -- part name: Notes Data
  27.  
  28.  
  29. -- part 8 (button)
  30. -- low flags: 00
  31. -- high flags: 2000
  32. -- rect: left=281 top=278 right=303 bottom=308
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 1014 / 1014
  35. -- text alignment: 1
  36. -- font id: 0
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: Prev
  41. ----- HyperTalk script -----
  42. on mouseUp
  43.   go to prev card of this bkgnd
  44. end mouseUp
  45.  
  46.  
  47.  
  48. -- part 9 (button)
  49. -- low flags: 00
  50. -- high flags: 2000
  51. -- rect: left=309 top=278 right=303 bottom=336
  52. -- title width / last selected line: 0
  53. -- icon id / first selected line: 1013 / 1013
  54. -- text alignment: 1
  55. -- font id: 0
  56. -- text size: 12
  57. -- style flags: 0
  58. -- line height: 16
  59. -- part name: Next
  60. ----- HyperTalk script -----
  61. on mouseUp
  62.   go to next card of this bkgnd
  63. end mouseUp
  64.  
  65.  
  66.  
  67. -- part 11 (button)
  68. -- low flags: 00
  69. -- high flags: 2004
  70. -- rect: left=3 top=23 right=52 bottom=35
  71. -- title width / last selected line: 0
  72. -- icon id / first selected line: 12042 / 12042
  73. -- text alignment: 1
  74. -- font id: 0
  75. -- text size: 12
  76. -- style flags: 0
  77. -- line height: 16
  78. -- part name: Home
  79. ----- HyperTalk script -----
  80. on mouseUp
  81.   visual effect iris open
  82.   go Home
  83. end mouseUp
  84.  
  85.  
  86.  
  87. -- part 12 (button)
  88. -- low flags: 00
  89. -- high flags: 2000
  90. -- rect: left=445 top=277 right=305 bottom=482
  91. -- title width / last selected line: 0
  92. -- icon id / first selected line: 1012 / 1012
  93. -- text alignment: 1
  94. -- font id: 0
  95. -- text size: 12
  96. -- style flags: 0
  97. -- line height: 16
  98. -- part name: Return
  99. ----- HyperTalk script -----
  100. on mouseUp
  101.   visual effect iris close
  102.   go to card ID 2974
  103. end mouseUp
  104.  
  105.  
  106.  
  107. -- part 13 (button)
  108. -- low flags: 00
  109. -- high flags: 2000
  110. -- rect: left=474 top=26 right=55 bottom=507
  111. -- title width / last selected line: 0
  112. -- icon id / first selected line: 26635 / 26635
  113. -- text alignment: 1
  114. -- font id: 0
  115. -- text size: 12
  116. -- style flags: 0
  117. -- line height: 16
  118. -- part name: How to…
  119. ----- HyperTalk script -----
  120. on mouseUp
  121.   push card
  122.   go to card id 8834
  123. end mouseUp
  124.  
  125.  
  126.  
  127.  
  128. -- part 15 (button)
  129. -- low flags: 00
  130. -- high flags: 2000
  131. -- rect: left=11 top=305 right=337 bottom=48
  132. -- title width / last selected line: 0
  133. -- icon id / first selected line: 1007 / 1007
  134. -- text alignment: 1
  135. -- font id: 0
  136. -- text size: 12
  137. -- style flags: 0
  138. -- line height: 16
  139. -- part name: ImageWriter
  140. ----- HyperTalk script -----
  141. on mouseUp
  142.   answer "Print ‚ÄúNotes‚Äù Report or Card?" with "Cancel" or "Report" or "Card"
  143.   if it is "Cancel" then
  144.     exit mouseUp
  145.   end if
  146.   if it is "Report" then
  147.     domenu "Print Report..."
  148.     exit mouseUp
  149.   end if
  150.   if it is "Card" then
  151.     open printing with dialog
  152.     if it is empty then
  153.       exit mouseUp
  154.     else
  155.       print this card
  156.       close printing
  157.     end if
  158.   end if
  159. end mouseUp
  160.  
  161.  
  162. -- part 16 (field)
  163. -- low flags: 01
  164. -- high flags: 0000
  165. -- rect: left=143 top=281 right=299 bottom=203
  166. -- title width / last selected line: 0
  167. -- icon id / first selected line: 0 / 0
  168. -- text alignment: 1
  169. -- font id: 3
  170. -- text size: 12
  171. -- style flags: 0
  172. -- line height: 16
  173. -- part name: page num
  174.  
  175.  
  176. -- part 17 (button)
  177. -- low flags: 00
  178. -- high flags: 2004
  179. -- rect: left=466 top=307 right=342 bottom=505
  180. -- title width / last selected line: 0
  181. -- icon id / first selected line: 22076 / 22076
  182. -- text alignment: 1
  183. -- font id: 0
  184. -- text size: 12
  185. -- style flags: 0
  186. -- line height: 16
  187. -- part name: Delete Card
  188. ----- HyperTalk script -----
  189. on mouseUp
  190.   answer "Delete this card?" with "Cancel" or "Yes"
  191.   if it is "cancel" then exit mouseUp
  192.   set the cursor to 4
  193.   set lockscreen to true
  194.   domenu "delete Card"
  195.   go prev
  196.   set lockScreen to false
  197. end mouseUp
  198.  
  199.